home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Video Toaster 4.3
/
Video Toaster v4.3.iso
/
3.1
/
toasterall
/
arexx_examples
/
tpaint
/
negvignette.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1993-05-13
|
698b
|
23 lines
/* NegVignette.rexx -- Fade Pic edges to negative */
/* © 1993 NewTek, Inc. by Arnie Cachelin */
if pos('DigiPaint',show(ports))=0 then do
say "Can't find ToasterPaint!"
exit
end
Address "DigiPaint" /* Tell ARexx where commands go */
'8rgb' 255 255 255 /* White color */
'Pmxo' /* XOR mode */
'Hvof' /* Set to radial gradient off */
'Hvar' /* Toggle radial gradient blend */
'Potv' $8000 /* Set hotspot center */
'Poth' $8000 /* Set hotspot center */
'Minc' /* Set Center transparency to 0% */
'Maxe' /* Set Edge transparency to 100% */
'Whsc' /* Fill Whole Screen */
'Shco' /* Render to composite out */
exit